home *** CD-ROM | disk | FTP | other *** search
/ NeXT Education Software Sampler 1992 Fall / NeXT Education Software Sampler 1992 Fall.iso / Demos / DE_CraftManDemo / CraftMan_Demo_1.1 / CraftMan.app / PostScript / Demo / Xanthus.xcps < prev   
Encoding:
Text File  |  1992-05-08  |  309 b   |  18 lines
  1. %begin_cm_vars
  2. %cm_var the_name "Xanthus"
  3. %end_cm_vars
  4.  
  5. userdict /the_name known not {/the_name (Xanthus) def} if
  6.  
  7. /fancy1 {/string exch def
  8. /Times-Roman findfont
  9. 50 scalefont
  10. setfont
  11. 50 50 translate
  12. 0.5 setgray
  13. 0 10 360 {360 div  setgray 25 rotate
  14. 1 .7 scale
  15. 1 1 moveto
  16. string show} for} def
  17.  
  18. the_name fancy1